/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / pc-mode.elc.z / pc-mode.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6b 77 7a 68 40 63 68 |piled by| kwzh@ch|
|00000020| 75 72 63 68 79 2e 67 6e | 75 2e 61 69 2e 6d 69 74 |urchy.gn|u.ai.mit|
|00000030| 2e 65 64 75 20 6f 6e 20 | 54 68 75 20 4d 61 79 20 |.edu on |Thu May |
|00000040| 32 33 20 31 34 3a 32 35 | 3a 34 34 20 31 39 39 36 |23 14:25|:44 1996|
|00000050| 0a 3b 3b 3b 20 66 72 6f | 6d 20 66 69 6c 65 20 2f |.;;; fro|m file /|
|00000060| 67 64 2f 67 6e 75 2f 65 | 6d 61 63 73 2f 31 39 2e |gd/gnu/e|macs/19.|
|00000070| 30 2f 6c 69 73 70 2f 70 | 63 2d 6d 6f 64 65 2e 65 |0/lisp/p|c-mode.e|
|00000080| 6c 0a 3b 3b 3b 20 65 6d | 61 63 73 20 76 65 72 73 |l.;;; em|acs vers|
|00000090| 69 6f 6e 20 31 39 2e 33 | 31 2e 31 2e 0a 3b 3b 3b |ion 19.3|1.1..;;;|
|000000a0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000b0| 6e 20 46 53 46 20 32 2e | 31 30 0a 3b 3b 3b 20 6f |n FSF 2.|10.;;; o|
|000000c0| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|000000d0| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|000000e0| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|000000f0| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000100| 20 69 6e 20 45 6d 61 63 | 73 20 31 38 2e 0a 0a 28 | in Emac|s 18...(|
|00000110| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000120| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000130| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000140| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000150| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000160| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|00000170| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000180| 72 73 69 6f 6e 20 22 31 | 39 2e 32 39 22 29 29 29 |rsion "1|9.29")))|
|00000190| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 60 70 63 |.    (er|ror "`pc|
|000001a0| 2d 6d 6f 64 65 2e 65 6c | 27 20 77 61 73 20 63 6f |-mode.el|' was co|
|000001b0| 6d 70 69 6c 65 64 20 66 | 6f 72 20 45 6d 61 63 73 |mpiled f|or Emacs|
|000001c0| 20 31 39 2e 32 39 20 6f | 72 20 6c 61 74 65 72 22 | 19.29 o|r later"|
|000001d0| 29 29 0a 0a 0a 23 40 33 | 35 32 20 53 65 74 20 75 |))...#@3|52 Set u|
|000001e0| 70 20 63 65 72 74 61 69 | 6e 20 6b 65 79 20 62 69 |p certai|n key bi|
|000001f0| 6e 64 69 6e 67 73 20 66 | 6f 72 20 50 43 20 63 6f |ndings f|or PC co|
|00000200| 6d 70 61 74 69 62 69 6c | 69 74 79 2e 0a 54 68 65 |mpatibil|ity..The|
|00000210| 20 6b 65 79 73 20 61 66 | 66 65 63 74 65 64 20 61 | keys af|fected a|
|00000220| 72 65 3a 0a 44 65 6c 65 | 74 65 20 28 61 6e 64 20 |re:.Dele|te (and |
|00000230| 69 74 73 20 76 61 72 69 | 61 6e 74 73 29 20 64 65 |its vari|ants) de|
|00000240| 6c 65 74 65 20 66 6f 72 | 77 61 72 64 20 69 6e 73 |lete for|ward ins|
|00000250| 74 65 61 64 20 6f 66 20 | 62 61 63 6b 77 61 72 64 |tead of |backward|
|00000260| 2e 0a 43 2d 42 61 63 6b | 73 70 61 63 65 20 6b 69 |..C-Back|space ki|
|00000270| 6c 6c 73 20 62 61 63 6b | 77 61 72 64 20 61 20 77 |lls back|ward a w|
|00000280| 6f 72 64 20 28 61 73 20 | 43 2d 44 65 6c 65 74 65 |ord (as |C-Delete|
|00000290| 20 6e 6f 72 6d 61 6c 6c | 79 20 77 6f 75 6c 64 29 | normall|y would)|
|000002a0| 2e 0a 4d 2d 42 61 63 6b | 73 70 61 63 65 20 64 6f |..M-Back|space do|
|000002b0| 65 73 20 75 6e 64 6f 2e | 0a 48 6f 6d 65 20 61 6e |es undo.|.Home an|
|000002c0| 64 20 45 6e 64 20 6d 6f | 76 65 20 74 6f 20 62 65 |d End mo|ve to be|
|000002d0| 67 69 6e 6e 69 6e 67 20 | 61 6e 64 20 65 6e 64 20 |ginning |and end |
|000002e0| 6f 66 20 6c 69 6e 65 0a | 43 2d 48 6f 6d 65 20 61 |of line.|C-Home a|
|000002f0| 6e 64 20 43 2d 45 6e 64 | 20 6d 6f 76 65 20 74 6f |nd C-End| move to|
|00000300| 20 62 65 67 69 6e 6e 69 | 6e 67 20 61 6e 64 20 65 | beginni|ng and e|
|00000310| 6e 64 20 6f 66 20 62 75 | 66 66 65 72 2e 0a 43 2d |nd of bu|ffer..C-|
|00000320| 45 73 63 61 70 65 20 64 | 6f 65 73 20 6c 69 73 74 |Escape d|oes list|
|00000330| 2d 62 75 66 66 65 72 73 | 2e 1f 0a 28 64 65 66 61 |-buffers|...(defa|
|00000340| 6c 69 61 73 20 27 70 63 | 2d 62 69 6e 64 69 6e 67 |lias 'pc|-binding|
|00000350| 73 2d 6d 6f 64 65 20 23 | 5b 6e 69 6c 20 22 c0 09 |s-mode #|[nil "..|
|00000360| c2 c3 23 88 c0 09 c4 c5 | 23 88 c0 09 c6 c7 23 88 |..#.....|#.....#.|
|00000370| c8 c9 ca 5c 22 88 c8 cb | cc 5c 22 88 c8 cd ce 5c |...\"...|.\"....\|
|00000380| 22 88 c8 cf d0 5c 22 88 | c8 d1 d2 5c 22 88 c8 d3 |"....\".|...\"...|
|00000390| d4 5c 22 88 c8 d5 d6 5c | 22 88 c8 d7 d8 5c 22 87 |.\"....\|"....\".|
|000003a0| 22 20 5b 64 65 66 69 6e | 65 2d 6b 65 79 20 66 75 |" [defin|e-key fu|
|000003b0| 6e 63 74 69 6f 6e 2d 6b | 65 79 2d 6d 61 70 20 5b |nction-k|ey-map [|
|000003c0| 64 65 6c 65 74 65 5d 20 | 22 04 22 20 5b 4d 2d 64 |delete] |"." [M-d|
|000003d0| 65 6c 65 74 65 5d 20 5b | 2d 31 33 34 32 31 37 36 |elete] [|-1342176|
|000003e0| 32 38 5d 20 5b 43 2d 64 | 65 6c 65 74 65 5d 20 5b |28] [C-d|elete] [|
|000003f0| 2d 31 33 34 32 31 37 36 | 32 38 5d 20 67 6c 6f 62 |-1342176|28] glob|
|00000400| 61 6c 2d 73 65 74 2d 6b | 65 79 20 5b 43 2d 4d 2d |al-set-k|ey [C-M-|
|00000410| 64 65 6c 65 74 65 5d 20 | 6b 69 6c 6c 2d 73 65 78 |delete] |kill-sex|
|00000420| 70 20 5b 43 2d 62 61 63 | 6b 73 70 61 63 65 5d 20 |p [C-bac|kspace] |
|00000430| 62 61 63 6b 77 61 72 64 | 2d 6b 69 6c 6c 2d 77 6f |backward|-kill-wo|
|00000440| 72 64 20 5b 4d 2d 62 61 | 63 6b 73 70 61 63 65 5d |rd [M-ba|ckspace]|
|00000450| 20 75 6e 64 6f 20 5b 43 | 2d 65 73 63 61 70 65 5d | undo [C|-escape]|
|00000460| 20 6c 69 73 74 2d 62 75 | 66 66 65 72 73 20 5b 68 | list-bu|ffers [h|
|00000470| 6f 6d 65 5d 20 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |ome] beg|inning-o|
|00000480| 66 2d 6c 69 6e 65 20 5b | 65 6e 64 5d 20 65 6e 64 |f-line [|end] end|
|00000490| 2d 6f 66 2d 6c 69 6e 65 | 20 5b 43 2d 68 6f 6d 65 |-of-line| [C-home|
|000004a0| 5d 20 62 65 67 69 6e 6e | 69 6e 67 2d 6f 66 2d 62 |] beginn|ing-of-b|
|000004b0| 75 66 66 65 72 20 5b 43 | 2d 65 6e 64 5d 20 65 6e |uffer [C|-end] en|
|000004c0| 64 2d 6f 66 2d 62 75 66 | 66 65 72 5d 20 34 20 28 |d-of-buf|fer] 4 (|
|000004d0| 23 24 20 2e 20 34 37 35 | 29 20 6e 69 6c 5d 29 0a |#$ . 475|) nil]).|
+--------+-------------------------+-------------------------+--------+--------+